** ========================================================
** COUNTRY-LEVEL ANALYSES
** ========================================================

* Loading the dataset *
use "../country_level_data.dta", clear


gen country_code=_n
label var country_code "Country code"

** ===========================================================================
** Adding the year-adjusted Transperancy International (TI) corruption data **
** ===========================================================================
gen TI_year_adj=.
recode TI_year_adj (.=32) if country_code==1 /* Argentina 2015 */
recode TI_year_adj (.=79) if country_code==2 /* Australia 2015 */
recode TI_year_adj (.=38) if country_code==3 /* Brazil 2015 */
recode TI_year_adj (.=83) if country_code==4 /* Canada 2015 */
recode TI_year_adj (.=66) if country_code==5 /* Chile 2016 */
recode TI_year_adj (.=37) if country_code==6 /* China 2015 */
recode TI_year_adj (.=48) if country_code==7 /* Croatia 2014 */ 
recode TI_year_adj (.=51) if country_code==8 /* Czech Republic 2014 */
recode TI_year_adj (.=92) if country_code==9 /* Denmark 2014 */
recode TI_year_adj (.=69) if country_code==10 /* France 2014 */
recode TI_year_adj (.=79) if country_code==11 /* Germany 2014 */
recode TI_year_adj (.=43) if country_code==12 /* Ghana 2016 */
recode TI_year_adj (.=43) if country_code==13 /* Greece 2014 */
recode TI_year_adj (.=38) if country_code==14 /* India 2015 */
recode TI_year_adj (.=37) if country_code==15 /* Indonesia 2016 */
recode TI_year_adj (.=61) if country_code==16 /* Israel 2015 */
recode TI_year_adj (.=43) if country_code==17 /* Italy 2014 */
recode TI_year_adj (.=28) if country_code==18 /* Kazakhstan 2016 */
recode TI_year_adj (.=25) if country_code==19 /* Kenya 2015 */
recode TI_year_adj (.=49) if country_code==20 /* Malaysia 2016 */
recode TI_year_adj (.=31) if country_code==21 /* Mexico 2015 */ 
recode TI_year_adj (.=36) if country_code==22 /* Morocco 2015 */
recode TI_year_adj (.=83) if country_code==23 /* Netherlands 2014 */
recode TI_year_adj (.=91) if country_code==24 /* New Zealand 2015 */
recode TI_year_adj (.=88) if country_code==25 /* Norway 2015 */
recode TI_year_adj (.=35) if country_code==26 /* Peru 2016 */
recode TI_year_adj (.=60) if country_code==27 /* Poland 2013 */
recode TI_year_adj (.=63) if country_code==28 /* Portugal 2014 */
recode TI_year_adj (.=43) if country_code==29 /* Romania 2014 */
recode TI_year_adj (.=29) if country_code==30 /* Russia 2015 */
recode TI_year_adj (.=41) if country_code==31 /* Serbia 2014 */
recode TI_year_adj (.=45) if country_code==32 /* South Africa 2016 */
recode TI_year_adj (.=60) if country_code==33 /* Spain 2014 */
recode TI_year_adj (.=87) if country_code==34 /* Sweden 2014 */
recode TI_year_adj (.=86) if country_code==35 /* Switzerland 2014 */
recode TI_year_adj (.=38) if country_code==36 /* Thailand 2015 */
recode TI_year_adj (.=45) if country_code==37 /* Turkey 2014 */
recode TI_year_adj (.=70) if country_code==38 /* UAE 2015 */
recode TI_year_adj (.=76) if country_code==39 /* UK 2013 */
recode TI_year_adj (.=76) if country_code==40 /* USA 2015 */
label var TI_year_adj "The country's year-adjusted Transperancy International (TI) corruption score"

*************************************************************************************
*** Adding the year-adjusted CoC (Control of Corruption) data from the World Bank ***
*************************************************************************************
gen CoC_year_adj=.
recode CoC_year_adj (.=-.55) if country_code==1 /* Argentina 2015 */
recode CoC_year_adj (.=1.88) if country_code==2 /* Australia 2015 */
recode CoC_year_adj (.=-.40) if country_code==3 /* Brazil 2015 */
recode CoC_year_adj (.=1.89) if country_code==4 /* Canada 2015 */
recode CoC_year_adj (.=1.14) if country_code==5 /* Chile 2016 */
recode CoC_year_adj (.=-.28) if country_code==6 /* China 2015 */
recode CoC_year_adj (.=.22) if country_code==7 /* Croatia 2014 */ 
recode CoC_year_adj (.=.37) if country_code==8 /* Czech Republic 2014 */
recode CoC_year_adj (.=2.25) if country_code==9 /* Denmark 2014 */
recode CoC_year_adj (.=1.31) if country_code==10 /* France 2014 */
recode CoC_year_adj (.=1.84) if country_code==11 /* Germany 2014 */
recode CoC_year_adj (.=-.15) if country_code==12 /* Ghana 2016 */
recode CoC_year_adj (.=-.12) if country_code==13 /* Greece 2014 */
recode CoC_year_adj (.=-.35) if country_code==14 /* India 2015 */
recode CoC_year_adj (.=-.4) if country_code==15 /* Indonesia 2016 */
recode CoC_year_adj (.=.94) if country_code==16 /* Israel 2015 */
recode CoC_year_adj (.=-.03) if country_code==17 /* Italy 2014 */
recode CoC_year_adj (.=-.82) if country_code==18 /* Kazakhstan 2016 */
recode CoC_year_adj (.=-1.01) if country_code==19 /* Kenya 2015 */
recode CoC_year_adj (.=.1) if country_code==20 /* Malaysia 2016 */
recode CoC_year_adj (.=-.77) if country_code==21 /* Mexico 2015 */ 
recode CoC_year_adj (.=-.22) if country_code==22 /* Morocco 2015 */
recode CoC_year_adj (.=1.99) if country_code==23 /* Netherlands 2014 */
recode CoC_year_adj (.=2.28) if country_code==24 /* New Zealand 2015 */
recode CoC_year_adj (.=2.24) if country_code==25 /* Norway 2015 */
recode CoC_year_adj (.=-.37) if country_code==26 /* Peru 2016 */
recode CoC_year_adj (.=.6) if country_code==27 /* Poland 2013 */
recode CoC_year_adj (.=.95) if country_code==28 /* Portugal 2014 */
recode CoC_year_adj (.=-.11) if country_code==29 /* Romania 2014 */
recode CoC_year_adj (.=-.95) if country_code==30 /* Russia 2015 */
recode CoC_year_adj (.=-.23) if country_code==31 /* Serbia 2014 */
recode CoC_year_adj (.=.12) if country_code==32 /* South Africa 2016 */
recode CoC_year_adj (.=.63) if country_code==33 /* Spain 2014 */
recode CoC_year_adj (.=2.15) if country_code==34 /* Sweden 2014 */
recode CoC_year_adj (.=2.15) if country_code==35 /* Switzerland 2014 */
recode CoC_year_adj (.=-.49) if country_code==36 /* Thailand 2015 */
recode CoC_year_adj (.=-.15) if country_code==37 /* Turkey 2014 */
recode CoC_year_adj (.=1.07) if country_code==38 /* UAE 2015 */
recode CoC_year_adj (.=1.7) if country_code==39 /* UK 2013 */
recode CoC_year_adj (.=1.4) if country_code==40 /* USA 2015 */
label var CoC_year_adj "The country's year-adjusted CoC (Control of Corruption) score"


********************************************
** Adding year-adjusted Polity_4 data **
********************************************
gen Polity4_year_adj=.
recode Polity4_year_adj (.=9) if country_code==1 /* Argentina 2015 */
recode Polity4_year_adj (.=10) if country_code==2 /* Australia 2015 */
recode Polity4_year_adj (.=8) if country_code==3 /* Brazil 2015 */
recode Polity4_year_adj (.=10) if country_code==4 /* Canada 2015 */
recode Polity4_year_adj (.=10) if country_code==5 /* Chile 2016 */
recode Polity4_year_adj (.=-7) if country_code==6 /* China 2015 */
recode Polity4_year_adj (.=9) if country_code==7 /* Croatia 2014 */ 
recode Polity4_year_adj (.=9) if country_code==8 /* Czech Republic 2014 */
recode Polity4_year_adj (.=10) if country_code==9 /* Denmark 2014 */
recode Polity4_year_adj (.=9) if country_code==10 /* France 2014 */
recode Polity4_year_adj (.=10) if country_code==11 /* Germany 2014 */
recode Polity4_year_adj (.=8) if country_code==12 /* Ghana 2016 */
recode Polity4_year_adj (.=10) if country_code==13 /* Greece 2014 */
recode Polity4_year_adj (.=9) if country_code==14 /* India 2015 */
recode Polity4_year_adj (.=9) if country_code==15 /* Indonesia 2016 */
recode Polity4_year_adj (.=6) if country_code==16 /* Israel 2015 */
recode Polity4_year_adj (.=10) if country_code==17 /* Italy 2014 */
recode Polity4_year_adj (.=-6) if country_code==18 /* Kazakhstan 2016 */
recode Polity4_year_adj (.=9) if country_code==19 /* Kenya 2015 */
recode Polity4_year_adj (.=5) if country_code==20 /* Malaysia 2016 */
recode Polity4_year_adj (.=8) if country_code==21 /* Mexico 2015 */ 
recode Polity4_year_adj (.=-4) if country_code==22 /* Morocco 2015 */
recode Polity4_year_adj (.=10) if country_code==23 /* Netherlands 2014 */
recode Polity4_year_adj (.=10) if country_code==24 /* New Zealand 2015 */
recode Polity4_year_adj (.=10) if country_code==25 /* Norway 2015 */
recode Polity4_year_adj (.=9) if country_code==26 /* Peru 2016 */
recode Polity4_year_adj (.=10) if country_code==27 /* Poland 2013 */
recode Polity4_year_adj (.=10) if country_code==28 /* Portugal 2014 */
recode Polity4_year_adj (.=9) if country_code==29 /* Romania 2014 */
recode Polity4_year_adj (.=4) if country_code==30 /* Russia 2015 */
recode Polity4_year_adj (.=8) if country_code==31 /* Serbia 2014 */
recode Polity4_year_adj (.=9) if country_code==32 /* South Africa 2016 */
recode Polity4_year_adj (.=10) if country_code==33 /* Spain 2014 */
recode Polity4_year_adj (.=10) if country_code==34 /* Sweden 2014 */
recode Polity4_year_adj (.=10) if country_code==35 /* Switzerland 2014 */
recode Polity4_year_adj (.=-3) if country_code==36 /* Thailand 2015 */
recode Polity4_year_adj (.=3) if country_code==37 /* Turkey 2014 */
recode Polity4_year_adj (.=-8) if country_code==38 /* UAE 2015 */
recode Polity4_year_adj (.=10) if country_code==39 /* UK 2013 */
recode Polity4_year_adj (.=10) if country_code==40 /* USA 2015 */
label var Polity4_year_adj "The country's year-adjusted Polity 4 (democracy level) score"


gen democracy=1 if Polity4>=6 & Polity4<=10
replace democracy=0 if Polity4>=-10 & Polity4<=5
label var democracy "Whethetr the country is a democracy? (1=yes, 0=no)"
tab democracy


**************************
* ESTIMATING CPI

*CONVERTING PUBLIC AND PRIVATE HONESTY TO A 1-100 SCALE:
replace priv_h= priv_h*100
replace pub_h= pub_h*100

* CREATING A RELATIVE PUBLIC SECTOR MEASURE:
gen RPH=pub_h-priv_h
label var RPH "Relative public sector honesty measure"

**********************************************
* Figure 2: Country & Sector Variance Plot
**********************************************
sort pub_h
gen id=_n
twoway (scatter pub_h id) (scatter priv_h id) 


* CREATING A MEAN-CENTERED LOGGED GDP PER-CAPITA:
gen c_log_gdp_pc=c_log_gdp-9.927218
label var c_log_gdp_pc "Mean-centered Log-transformed GDP per-capita"


******************************
*Table 3: Correlations table *
******************************
pwcorr TI_year_adj CoC_year_adj priv_h pub_h RPH c_log_gdp, sig obs



****************************************
*Table 4: Testing H1, H3 with CPI data *
****************************************

* Model 1 - Only GDP PC
reg TI_year_adj c_log_gdp_pc
outreg2 using Table_4.doc, replace stats(coef se pval) dec(3) noaster  

* Model 2 - Adding Public sector culture 
reg TI_year_adj c_log_gdp_pc RPH
outreg2 using Table_4.doc, append stats(coef se pval) dec(3) noaster  

* Model 3 - Adding Public sector honesty  
reg TI_year_adj c_log_gdp_pc RPH pub_h
outreg2 using Table_4.doc, append stats(coef se pval) dec(3) noaster  

** 'Dominance' analysis (see also below in Appendix Table D1) 
domin TI_year_adj c_log_gdp_pc RPH pub_h


******************************
* Testing H1, H3 with CoC data
******************************

* Model 4 - Only GDP PC
reg CoC_year_adj c_log_gdp_pc
outreg2 using Table_4.doc, append stats(coef se pval) dec(3) noaster  

* Model 5 - Adding Public sector culture 
reg CoC_year_adj c_log_gdp_pc RPH
outreg2 using Table_4.doc, append stats(coef se pval) dec(3) noaster  

* Model 6 - Adding Public sector honesty  
reg CoC_year_adj c_log_gdp_pc RPH pub_h
outreg2 using Table_4.doc, append stats(coef se pval) dec(3) noaster  


** 'Dominance' analysis (see also below in Appendix Table D1)
domin CoC_year_adj c_log_gdp_pc RPH pub_h


********************
** Online appendix *
********************

* Federalism dummy variable 
* Federal countries: Argentina, Australia, Brazil, Canada, Germany, India, Malaysia///
* Mexico, Russia, South Africa, Spain, Switzerland, UAE, US
gen federal=0
replace federal=1 if (country_code>=1 & country_code<=4) | country_code==11 | ///
					  country_code==14 | country_code==20 | country_code==21 | ///
					  country_code==30 | country_code==32 | country_code==33 | ///
					  country_code==35 | country_code==38 | country_code==40
label var federal "A federalism dummy variable"


* First public-sector wage premium measure (compared to all private employees)
gen PS_WP=.
recode PS_WP (.=0.221768897892145) if country_code==1 /* Argentina 2014 */
recode PS_WP (.=.) if country_code==2 /* Australia 2015 */
recode PS_WP (.=0.172996539058308) if country_code==3 /* Brazil 2014 */
recode PS_WP (.=0.22140275816017) if country_code==4 /* Canada 2010 */
recode PS_WP (.=0.118742928042177) if country_code==5 /* Chile 2013 */
recode PS_WP (.=-0.0362698129557891) if country_code==6 /* China 2013 */
recode PS_WP (.=0.150006937096852) if country_code==7 /* Croatia 2014 */ 
recode PS_WP (.=-0.0148082334872769) if country_code==8 /* Czech Republic 2014 */
recode PS_WP (.=-0.0620799678660394) if country_code==9 /* Denmark 2016 */
recode PS_WP (.=-0.125258384352107) if country_code==10 /* France 2014 */
recode PS_WP (.=0.246076730587381) if country_code==11 /* Germany 2013 */
recode PS_WP (.=0.383796240771768) if country_code==12 /* Ghana 2012 */
recode PS_WP (.=0.113076513802114) if country_code==13 /* Greece 2014 */
recode PS_WP (.=-0.102870224993747) if country_code==14 /* India 2015 */
recode PS_WP (.=-0.249422934691918) if country_code==15 /* Indonesia 2018 */
recode PS_WP (.=.) if country_code==16 /* Israel 2015 */
recode PS_WP (.=0.111880475683734) if country_code==17 /* Italy 2014 */
recode PS_WP (.=0.228445326125783) if country_code==18 /* Kazakhstan 2013 */
recode PS_WP (.=0.630275319204626) if country_code==19 /* Kenya 2005 */
recode PS_WP (.=.) if country_code==20 /* Malaysia 2016 */
recode PS_WP (.=0.355254865967954) if country_code==21 /* Mexico 2015 */ 
recode PS_WP (.=.) if country_code==22 /* Morocco 2015 */
recode PS_WP (.=.) if country_code==23 /* Netherlands 2014 */
recode PS_WP (.=.) if country_code==24 /* New Zealand 2015 */
recode PS_WP (.=-0.173958022958763) if country_code==25 /* Norway 2017 */
recode PS_WP (.=0.344128662866737) if country_code==26 /* Peru 2017 */
recode PS_WP (.=0.0913125751911439) if country_code==27 /* Poland 2013 */
recode PS_WP (.=0.0669980669093291) if country_code==28 /* Portugal 2014 */
recode PS_WP (.=-0.0120297659341297) if country_code==29 /* Romania 2014 */
recode PS_WP (.=-0.135897239173851) if country_code==30 /* Russia 2009 */
recode PS_WP (.=0.141378252309332) if country_code==31 /* Serbia 2014 */
recode PS_WP (.=0.746934469627321) if country_code==32 /* South Africa 2004 */
recode PS_WP (.=0.250075677137072) if country_code==33 /* Spain 2014 */
recode PS_WP (.=.) if country_code==34 /* Sweden 2014 */
recode PS_WP (.=-0.0536787475706048) if country_code==35 /* Switzerland 2014 */
recode PS_WP (.=.) if country_code==36 /* Thailand 2015 */
recode PS_WP (.=0.438826205015734) if country_code==37 /* Turkey 2004 */
recode PS_WP (.=.) if country_code==38 /* UAE 2015 */
recode PS_WP (.=-0.0353510660526921) if country_code==39 /* UK 2013 */
recode PS_WP (.=-0.0392105608476768) if country_code==40 /* USA 2013	 */
label var PS_WP "The first Public-sector wage premium measure (World Bank data)" 


* Second public-sector wage premium measure (compared to formal wage employees)
gen PS_WP2=.
recode PS_WP2 (.=0.0395297221839428) if country_code==1 /* Argentina 2014 */
recode PS_WP2 (.=.) if country_code==2 /* Australia 2015 */
recode PS_WP2 (.=0.0958846360445023) if country_code==3 /* Brazil 2014 */
recode PS_WP2 (.=.) if country_code==4 /* Canada 2010 */
recode PS_WP2 (.=0.0889699161052704) if country_code==5 /* Chile 2013 */
recode PS_WP2 (.=-0.0418304689228535) if country_code==6 /* China 2013 */
recode PS_WP2 (.=0.15000693500042) if country_code==7 /* Croatia 2014 */ 
recode PS_WP2 (.=-0.0148082338273525) if country_code==8 /* Czech Republic 2014 */
recode PS_WP2 (.=-0.0590069741010666) if country_code==9 /* Denmark 2016 */
recode PS_WP2 (.=-0.1258704662323) if country_code==10 /* France 2014 */
recode PS_WP2 (.=.) if country_code==11 /* Germany 2013 */
recode PS_WP2 (.=0.25850111246109) if country_code==12 /* Ghana 2012 */
recode PS_WP2 (.=0.102954000234604) if country_code==13 /* Greece 2014 */
recode PS_WP2 (.=-0.104353986680508) if country_code==14 /* India 2011 */
recode PS_WP2 (.=-0.338779330253601) if country_code==15 /* Indonesia 2018 */
recode PS_WP2 (.=.) if country_code==16 /* Israel 2015 */
recode PS_WP2 (.=0.111880473792553) if country_code==17 /* Italy 2014 */
recode PS_WP2 (.=.) if country_code==18 /* Kazakhstan 2013 */
recode PS_WP2 (.=0.322801262140274) if country_code==19 /* Kenya 2005 */
recode PS_WP2 (.=.) if country_code==20 /* Malaysia 2016 */
recode PS_WP2 (.=0.144109532237053) if country_code==21 /* Mexico 2017 */ 
recode PS_WP2 (.=.) if country_code==22 /* Morocco 2015 */
recode PS_WP2 (.=.) if country_code==23 /* Netherlands 2014 */
recode PS_WP2 (.=.) if country_code==24 /* New Zealand 2015 */
recode PS_WP2 (.=-0.174267709255219) if country_code==25 /* Norway 2017 */
recode PS_WP2 (.=-0.128172516822815) if country_code==26 /* Peru 2014 */
recode PS_WP2 (.=0.0778875052928925) if country_code==27 /* Poland 2014 */
recode PS_WP2 (.=0.0669980645179749) if country_code==28 /* Portugal 2014 */
recode PS_WP2 (.=-0.0127591323107481) if country_code==29 /* Romania 2014 */
recode PS_WP2 (.=-0.15499147772789) if country_code==30 /* Russia 2009 */
recode PS_WP2 (.=0.141378253698349) if country_code==31 /* Serbia 2014 */
recode PS_WP2 (.=0.534945249557495) if country_code==32 /* South Africa 2004 */
recode PS_WP2 (.=0.249753445386887) if country_code==33 /* Spain 2014 */
recode PS_WP2 (.=.) if country_code==34 /* Sweden 2014 */
recode PS_WP2 (.=-0.053678747266531) if country_code==35 /* Switzerland 2014 */
recode PS_WP2 (.=.) if country_code==36 /* Thailand 2015 */
recode PS_WP2 (.=0.17962746322155) if country_code==37 /* Turkey 2004 */
recode PS_WP2 (.=.) if country_code==38 /* UAE 2015 */
recode PS_WP2 (.=-0.0419387146830559) if country_code==39 /* UK 2013 */
recode PS_WP2 (.=-0.0392105608476768) if country_code==40 /* USA 2013	 */
label var PS_WP2 "The second Public-sector wage premium measure (World Bank data)" 


* Cornell and Sundell (2020) Relative public-sector wages (ILO data) measure
gen CS_PSW=.
recode CS_PSW (.=1.1468788) if country_code==1 /* Argentina */
recode CS_PSW (.=.) if country_code==2 /* Australia */
recode CS_PSW (.=.) if country_code==3 /* Brazil */
recode CS_PSW (.=.) if country_code==4 /* Canada */
recode CS_PSW (.=.) if country_code==5 /* Chile */
recode CS_PSW (.=.93300247) if country_code==6 /* China */
recode CS_PSW (.=.) if country_code==7 /* Croatia */ 
recode CS_PSW (.=1.0467741) if country_code==8 /* Czech Republic */
recode CS_PSW (.=1.0667864) if country_code==9 /* Denmark */
recode CS_PSW (.=.8587724) if country_code==10 /* France */
recode CS_PSW (.=.99188274) if country_code==11 /* Germany */
recode CS_PSW (.=.) if country_code==12 /* Ghana */
recode CS_PSW (.=.79639071) if country_code==13 /* Greece */
recode CS_PSW (.=.) if country_code==14 /* India */
recode CS_PSW (.=1.393581) if country_code==15 /* Indonesia */
recode CS_PSW (.=.8064642) if country_code==16 /* Israel */
recode CS_PSW (.=1.0772444) if country_code==17 /* Italy */
recode CS_PSW (.=.86977738) if country_code==18 /* Kazakhstan */
recode CS_PSW (.=.) if country_code==19 /* Kenya */
recode CS_PSW (.=1.3844937) if country_code==20 /* Malaysia */
recode CS_PSW (.=.) if country_code==21 /* Mexico */ 
recode CS_PSW (.=.) if country_code==22 /* Morocco */
recode CS_PSW (.=.) if country_code==23 /* Netherlands */
recode CS_PSW (.=1.3139046) if country_code==24 /* New Zealand */
recode CS_PSW (.=.96028191) if country_code==25 /* Norway */
recode CS_PSW (.=1.1521806) if country_code==26 /* Peru */
recode CS_PSW (.=1.1827027) if country_code==27 /* Poland */
recode CS_PSW (.=1.2570043) if country_code==28 /* Portugal */
recode CS_PSW (.=1.3694866) if country_code==29 /* Romania */
recode CS_PSW (.=1.1716882) if country_code==30 /* Russia */
recode CS_PSW (.=.71064919) if country_code==31 /* Serbia */
recode CS_PSW (.=.) if country_code==32 /* South Africa */
recode CS_PSW (.=1.2554852) if country_code==33 /* Spain */
recode CS_PSW (.=1.0476241) if country_code==34 /* Sweden */
recode CS_PSW (.=1.149111) if country_code==35 /* Switzerland */
recode CS_PSW (.=1.1523589) if country_code==36 /* Thailand */
recode CS_PSW (.=.) if country_code==37 /* Turkey */
recode CS_PSW (.=.) if country_code==38 /* UAE */
recode CS_PSW (.=1.1931819) if country_code==39 /* UK */
recode CS_PSW (.=.) if country_code==40 /* USA */
label var CS_PSW "Cornell and Sundell (2020) Relative public-sector wages (ILO data)" 


**************
** Table C9 **
**************

** predicting CPI **
* Model 1
reg ti_year_adj c_log_gdp_pc RPH PH federal, beta
outreg2 using Table_C9.doc, replace stats(coef se pval) dec(3) noaster  

* Model 2
reg ti_year_adj c_log_gdp_pc RPH PH polity4_year_adj, beta
outreg2 using Table_C9.doc, append stats(coef se pval) dec(3) noaster

* Model 3
reg ti_year_adj c_log_gdp_pc RPH PH PS_WP, beta
outreg2 using Table_C9.doc, append stats(coef se pval) dec(3) noaster 

* Model 4
reg ti_year_adj c_log_gdp_pc RPH PH federal polity4_year_adj PS_WP, beta
outreg2 using Table_C9.doc, append stats(coef se pval) dec(3) noaster 


** predicting CoC **
* Model 5
reg CoC_year_adj c_log_gdp_pc RPH PH federal, beta
outreg2 using Table_C9.doc, append stats(coef se pval) dec(3) noaster 

* Model 6
reg CoC_year_adj c_log_gdp_pc RPH PH polity4_year_adj, beta
outreg2 using Table_C9.doc, append stats(coef se pval) dec(3) noaster 

* Model 7
reg CoC_year_adj c_log_gdp_pc RPH PH PS_WP, beta
outreg2 using Table_C9.doc, append stats(coef se pval) dec(3) noaster 

* Model 8
reg CoC_year_adj c_log_gdp_pc RPH PH federal polity4_year_adj PS_WP, beta
outreg2 using Table_C9.doc, append stats(coef se pval) dec(3) noaster 


**************
** Table D1 **
**************
** 'Dominance' analysis (CPI) 
domin TI_year_adj c_log_gdp_pc RPH pub_h

** 'Dominance' analysis (CoC)
domin CoC_year_adj c_log_gdp_pc RPH pub_h


**************
** Table E1 **
**************
* CPI as dependent variable:
reg TI_year_adj c_log_gdp_pc priv_h pub_h
outreg2 using Table_E1.doc, replace stats(coef se pval) dec(3) noaster  

* CoC as dependent variable:
reg CoC_year_adj c_log_gdp_pc priv_h pub_h
outreg2 using Table_E1.doc, append stats(coef se pval) dec(3) noaster  
